home *** CD-ROM | disk | FTP | other *** search
/ LOGIC Apps / Logic-APPLE_II_APPS.iso / mac / LOGIC Apple II 5.25" Library - ProDOS / PRO030.dsk / F.SYSTEM.asm < prev    next >
Assembly Source File  |  2012-02-16  |  11KB  |  490 lines
  1. 2000- A2 FF     LDX #$FF
  2. 2002- 9A        TXS
  3. 2003- A9 00     LDA #$00
  4. 2005- 85 3C     STA $3C
  5. 2007- 85 3E     STA $3E
  6. 2009- 85 42     STA $42
  7. 200B- A9 21     LDA #$21
  8. 200D- 85 3D     STA $3D
  9. 200F- A9 24     LDA #$24
  10. 2011- 85 3F     STA $3F
  11. 2013- A9 A0     LDA #$A0
  12. 2015- 85 43     STA $43
  13. 2017- A0 00     LDY #$00
  14. 2019- 20 2C FE  JSR $FE2C
  15. 201C- A9 00     LDA #$00
  16. 201E- 8D F2 03  STA $03F2
  17. 2021- A9 A0     LDA #$A0
  18. 2023- 8D F3 03  STA $03F3
  19. 2026- 49 A5     EOR #$A5
  20. 2028- 8D F4 03  STA $03F4
  21. 202B- 4C 00 A0  JMP $A000
  22. 202E- 00        BRK
  23. 202F- 00        BRK
  24. 2030- 00        BRK
  25. 2031- 00        BRK
  26. 2032- 00        BRK
  27. 2033- 00        BRK
  28. 2034- 00        BRK
  29. 2035- 00        BRK
  30. 2036- 00        BRK
  31. 2037- 00        BRK
  32. 2038- 00        BRK
  33. 2039- 00        BRK
  34. 203A- 00        BRK
  35. 203B- 00        BRK
  36. 203C- 00        BRK
  37. 203D- 00        BRK
  38. 203E- 00        BRK
  39. 203F- 00        BRK
  40. 2040- 00        BRK
  41. 2041- 00        BRK
  42. 2042- 00        BRK
  43. 2043- 00        BRK
  44. 2044- 00        BRK
  45. 2045- 00        BRK
  46. 2046- 00        BRK
  47. 2047- A9 9A     LDA #$9A
  48. 2049- 85 03     STA $03
  49. 204B- A9 24     LDA #$24
  50. 204D- 85 01     STA $01
  51. 204F- A9 00     LDA #$00
  52. 2051- 85 00     STA $00
  53. 2053- 85 02     STA $02
  54. 2055- A2 23     LDX #$23
  55. 2057- A8        TAY
  56. 2058- 20 C4 20  JSR $20C4
  57. 205B- A2 01     LDX #$01
  58. 205D- A9 BE     LDA #$BE
  59. 205F- 85 03     STA $03
  60. 2061- 20 C4 20  JSR $20C4
  61. 2064- A9 15     LDA #$15
  62. 2066- 20 ED FD  JSR $FDED
  63. 2069- 20 84 FE  JSR $FE84
  64. 206C- 20 2F FB  JSR $FB2F
  65. 206F- 20 58 FC  JSR $FC58
  66. 2072- A2 17     LDX #$17
  67. 2074- A9 00     LDA #$00
  68. 2076- 9D 58 BF  STA $BF58,X
  69. 2079- CA        DEX
  70. 207A- D0 FA     BNE $2076
  71. 207C- A9 CF     LDA #$CF
  72. 207E- 8D 58 BF  STA $BF58
  73. 2081- A9 3F     LDA #$3F
  74. 2083- 8D 6B BF  STA $BF6B
  75. 2086- A9 FF     LDA #$FF
  76. 2088- 8D 6C BF  STA $BF6C
  77. 208B- 8D 6D BF  STA $BF6D
  78. 208E- 8D 6E BF  STA $BF6E
  79. 2091- A9 C3     LDA #$C3
  80. 2093- 8D 6F BF  STA $BF6F
  81. 2096- AD 00 E0  LDA $E000
  82. 2099- C9 4C     CMP #$4C
  83. 209B- D0 14     BNE $20B1
  84. 209D- AD 98 BF  LDA $BF98
  85. 20A0- 29 20     AND #$20
  86. 20A2- F0 0D     BEQ $20B1
  87. 20A4- A2 03     LDX #$03
  88. 20A6- BD 1A 22  LDA $221A,X
  89. 20A9- 95 36     STA $36,X
  90. 20AB- CA        DEX
  91. 20AC- 10 F8     BPL $20A6
  92. 20AE- 4C 00 E0  JMP $E000
  93. 20B1- A2 27     LDX #$27
  94. 20B3- BD 3F 22  LDA $223F,X
  95. 20B6- 9D 28 06  STA $0628,X
  96. 20B9- CA        DEX
  97. 20BA- 10 F7     BPL $20B3
  98. 20BC- 8D F4 03  STA $03F4
  99. 20BF- 8D F3 03  STA $03F3
  100. 20C2- 30 FE     BMI $20C2
  101. 20C4- 88        DEY
  102. 20C5- B1 00     LDA ($00),Y
  103. 20C7- 91 02     STA ($02),Y
  104. 20C9- 98        TYA
  105. 20CA- D0 F8     BNE $20C4
  106. 20CC- E6 01     INC $01
  107. 20CE- E6 03     INC $03
  108. 20D0- CA        DEX
  109. 20D1- D0 F1     BNE $20C4
  110. 20D3- 60        RTS
  111. 20D4- C9 DD     CMP #$DD
  112. 20D6- D0 FB     BNE $20D3
  113. 20D8- AD 10 BE  LDA $BE10
  114. 20DB- 85 36     STA $36
  115. 20DD- AD 11 BE  LDA $BE11
  116. 20E0- 85 37     STA $37
  117. 20E2- AD 30 BF  LDA $BF30
  118. 20E5- 8D 38 22  STA $2238
  119. 20E8- A2 01     LDX #$01
  120. 20EA- 0A        ASL
  121. 20EB- 90 01     BCC $20EE
  122. 20ED- E8        INX
  123. 20EE- 8E 3D BE  STX $BE3D
  124. 20F1- 0A        ASL
  125. 20F2- 2A        ROL
  126. 20F3- 2A        ROL
  127. 20F4- 2A        ROL
  128. 20F5- 29 07     AND #$07
  129. 20F7- 8D 3C BE  STA $BE3C
  130. 20FA- A2 C1     LDX #$C1
  131. 20FC- A0 02     LDY #$02
  132. 20FE- AD 99 AD  LDA $AD99
  133. 2101- 82        ???
  134. 2102- C0 20     CPY #$20
  135. 2104- 93        ???
  136. 2105- FE 20 89  INC $8920,X
  137. 2108- FE 8D 0C  INC $0C8D,X
  138. 210B- C0 8D     CPY #$8D
  139. 210D- 0F        ???
  140. 210E- C0 8D     CPY #$8D
  141. 2110- 00        BRK
  142. 2111- C0 AD     CPY #$AD
  143. 2113- 98        TYA
  144. 2114- BF        ???
  145. 2115- 29 02     AND #$02
  146. 2117- F0 03     BEQ $211C
  147. 2119- 20 00 C3  JSR $C300
  148. 211C- 20 58 FC  JSR $FC58
  149. 211F- 20 01 A1  JSR $A101
  150. 2122- A2 17     LDX #$17
  151. 2124- A9 01     LDA #$01
  152. 2126- 9D 58 BF  STA $BF58,X
  153. 2129- CA        DEX
  154. 212A- A9 00     LDA #$00
  155. 212C- 8D 94 BF  STA $BF94
  156. 212F- 9D 58 BF  STA $BF58,X
  157. 2132- CA        DEX
  158. 2133- 10 FA     BPL $212F
  159. 2135- A9 CF     LDA #$CF
  160. 2137- 8D 58 BF  STA $BF58
  161. 213A- A9 B2     LDA #$B2
  162. 213C- 85 3D     STA $3D
  163. 213E- A0 00     LDY #$00
  164. 2140- 84 3C     STY $3C
  165. 2142- 98        TYA
  166. 2143- 91 3C     STA ($3C),Y
  167. 2145- C8        INY
  168. 2146- D0 FB     BNE $2143
  169. 2148- E6 3D     INC $3D
  170. 214A- A5 3D     LDA $3D
  171. 214C- C9 BF     CMP #$BF
  172. 214E- D0 F2     BNE $2142
  173. 2150- 20 00 BF  JSR $BF00
  174. 2153- CC EE A1  CPY $A1EE
  175. 2156- B0 64     BCS $21BC
  176. 2158- 20 00 BF  JSR $BF00
  177. 215B- C7        ???
  178. 215C- D8        CLD
  179. 215D- A1 B0     LDA ($B0,X)
  180. 215F- 5C        ???
  181. 2160- AD 15 A2  LDA $A215
  182. 2163- F0 57     BEQ $21BC
  183. 2165- A9 07     LDA #$07
  184. 2167- 8D DC A1  STA $A1DC
  185. 216A- A9 A2     LDA #$A2
  186. 216C- 8D DD A1  STA $A1DD
  187. 216F- 20 00 BF  JSR $BF00
  188. 2172- C8        INY
  189. 2173- DB        ???
  190. 2174- A1 B0     LDA ($B0,X)
  191. 2176- 45 AD     EOR $AD
  192. 2178- E0 A1     CPX #$A1
  193. 217A- 8D E2 A1  STA $A1E2
  194. 217D- 20 00 BF  JSR $BF00
  195. 2180- D1 E1     CMP ($E1),Y
  196. 2182- A1 B0     LDA ($B0,X)
  197. 2184- 37        ???
  198. 2185- AD E0 A1  LDA $A1E0
  199. 2188- 8D E7 A1  STA $A1E7
  200. 218B- AD E3 A1  LDA $A1E3
  201. 218E- 8D EA A1  STA $A1EA
  202. 2191- AD E4 A1  LDA $A1E4
  203. 2194- 8D EB A1  STA $A1EB
  204. 2197- 20 00 BF  JSR $BF00
  205. 219A- CA        DEX
  206. 219B- E6 A1     INC $A1
  207. 219D- B0 1D     BCS $21BC
  208. 219F- 20 00 BF  JSR $BF00
  209. 21A2- CC EE A1  CPY $A1EE
  210. 21A5- B0 15     BCS $21BC
  211. 21A7- A9 0E     LDA #$0E
  212. 21A9- 8D DC A1  STA $A1DC
  213. 21AC- A9 A2     LDA #$A2
  214. 21AE- 8D DD A1  STA $A1DD
  215. 21B1- 20 00 BF  JSR $BF00
  216. 21B4- C8        INY
  217. 21B5- DB        ???
  218. 21B6- A1 B0     LDA ($B0,X)
  219. 21B8- 03        ???
  220. 21B9- 4C 00 08  JMP $0800
  221. 21BC- 48        PHA
  222. 21BD- 20 8E FD  JSR $FD8E
  223. 21C0- AC F7 A1  LDY $A1F7
  224. 21C3- A2 01     LDX #$01
  225. 21C5- BD F7 A1  LDA $A1F7,X
  226. 21C8- 09 80     ORA #$80
  227. 21CA- 20 ED FD  JSR $FDED
  228. 21CD- E8        INX
  229. 21CE- 88        DEY
  230. 21CF- D0 F4     BNE $21C5
  231. 21D1- 68        PLA
  232. 21D2- 20 DA FD  JSR $FDDA
  233. 21D5- 20 0C FD  JSR $FD0C
  234. 21D8- 20 00 BF  JSR $BF00
  235. 21DB- 65 F0     ADC $F0
  236. 21DD- A1 A0     LDA ($A0,X)
  237. 21DF- 00        BRK
  238. 21E0- 68        PLA
  239. 21E1- 85 3C     STA $3C
  240. 21E3- 68        PLA
  241. 21E4- 85 3D     STA $3D
  242. 21E6- E6 3C     INC $3C
  243. 21E8- D0 02     BNE $21EC
  244. 21EA- E6 3D     INC $3D
  245. 21EC- B1 3C     LDA ($3C),Y
  246. 21EE- F0 08     BEQ $21F8
  247. 21F0- 09 80     ORA #$80
  248. 21F2- 20 ED FD  JSR $FDED
  249. 21F5- 4C E6 A0  JMP $A0E6
  250. 21F8- E6 3C     INC $3C
  251. 21FA- D0 02     BNE $21FE
  252. 21FC- E6 3D     INC $3D
  253. 21FE- 6C 3C     JMP ($3C)
  254. 2200- 00        BRK
  255. 2201- 20 DE A0  JSR $A0DE
  256. 2204- 0D 0D 2A  ORA $2A0D
  257. 2207- 2A        ROL
  258. 2208- 2A        ROL
  259. 2209- 20 50 52  JSR $5250
  260. 220C- 4F        ???
  261. 220D- 2D 46 4F  AND $4F46
  262. 2210- 52        ???
  263. 2211- 54        ???
  264. 2212- 48        PHA
  265. 2213- 20 56 33  JSR $3356
  266. 2216- 2E 30 20  ROL $2030
  267. 2219- 2A        ROL
  268. 221A- 2A        ROL
  269. 221B- 2A        ROL
  270. 221C- 0D 0D 0D  ORA $0D0D
  271. 221F- 50 52     BVC $2273
  272. 2221- 45 53     EOR $53
  273. 2223- 45 4E     EOR $4E
  274. 2225- 54        ???
  275. 2226- 45 44     EOR $44
  276. 2228- 20 42 59  JSR $5942
  277. 222B- 20 41 50  JSR $5041
  278. 222E- 50 4C     BVC $227C
  279. 2230- 45 2D     EOR $2D
  280. 2232- 44        ???
  281. 2233- 41 59     EOR ($59,X)
  282. 2235- 54        ???
  283. 2236- 4F        ???
  284. 2237- 4E 2C 20  LSR $202C
  285. 223A- 49 4E     EOR #$4E
  286. 223C- 43        ???
  287. 223D- 2E 0D 0D  ROL $0D0D
  288. 2240- 50 4F     BVC $2291
  289. 2242- 20 42 4F  JSR $4F42
  290. 2245- 58        CLI
  291. 2246- 20 31 36  JSR $3631
  292. 2249- 36 36     ROL $36,X
  293. 224B- 20 46 41  JSR $4146
  294. 224E- 49 52     EOR #$52
  295. 2250- 42        ???
  296. 2251- 4F        ???
  297. 2252- 52        ???
  298. 2253- 4E 20 4F  LSR $4F20
  299. 2256- 48        PHA
  300. 2257- 20 34 35  JSR $3534
  301. 225A- 33        ???
  302. 225B- 32        ???
  303. 225C- 34        ???
  304. 225D- 2D 37 36  AND $3637
  305. 2260- 36 36     ROL $36,X
  306. 2262- 0D 0D 0D  ORA $0D0D
  307. 2265- 43        ???
  308. 2266- 4F        ???
  309. 2267- 55 52     EOR $52,X
  310. 2269- 54        ???
  311. 226A- 45 53     EOR $53
  312. 226C- 59 20 4F  EOR $4F20,Y
  313. 226F- 46 20     LSR $20
  314. 2271- 54        ???
  315. 2272- 48        PHA
  316. 2273- 45 20     EOR $20
  317. 2275- 46 4F     LSR $4F
  318. 2277- 52        ???
  319. 2278- 54        ???
  320. 2279- 48        PHA
  321. 227A- 20 49 4E  JSR $4E49
  322. 227D- 54        ???
  323. 227E- 45 52     EOR $52
  324. 2280- 45 53     EOR $53
  325. 2282- 54        ???
  326. 2283- 20 47 52  JSR $5247
  327. 2286- 4F        ???
  328. 2287- 55 50     EOR $50,X
  329. 2289- 0D 0D 50  ORA $500D
  330. 228C- 4F        ???
  331. 228D- 20 42 4F  JSR $4F42
  332. 2290- 58        CLI
  333. 2291- 20 31 31  JSR $3131
  334. 2294- 30 35     BMI $22CB
  335. 2296- 20 53 41  JSR $4153
  336. 2299- 4E 20 43  LSR $4320
  337. 229C- 41 52     EOR ($52,X)
  338. 229E- 4C 4F 53  JMP $534F
  339. 22A1- 20 43 41  JSR $4143
  340. 22A4- 20 39 34  JSR $3439
  341. 22A7- 30 37     BMI $22E0
  342. 22A9- 30 0D     BMI $22B8
  343. 22AB- 0D 0D 41  ORA $410D
  344. 22AE- 44        ???
  345. 22AF- 41 50     EOR ($50,X)
  346. 22B1- 54        ???
  347. 22B2- 45 44     EOR $44
  348. 22B4- 20 46 4F  JSR $4F46
  349. 22B7- 52        ???
  350. 22B8- 20 50 52  JSR $5250
  351. 22BB- 4F        ???
  352. 22BC- 44        ???
  353. 22BD- 4F        ???
  354. 22BE- 53        ???
  355. 22BF- 20 42 59  JSR $5942
  356. 22C2- 20 4A 4F  JSR $4F4A
  357. 22C5- 48        PHA
  358. 22C6- 4E 20 42  LSR $4220
  359. 22C9- 2E 20 4D  ROL $4D20
  360. 22CC- 41 54     EOR ($54,X)
  361. 22CE- 54        ???
  362. 22CF- 48        PHA
  363. 22D0- 45 57     EOR $57
  364. 22D2- 53        ???
  365. 22D3- 0D 0D 0D  ORA $0D0D
  366. 22D6- 00        BRK
  367. 22D7- 60        RTS
  368. 22D8- 01 15     ORA ($15,X)
  369. 22DA- A2 03     LDX #$03
  370. 22DC- 07        ???
  371. 22DD- A2 00     LDX #$00
  372. 22DF- B2        ???
  373. 22E0- 00        BRK
  374. 22E1- 02        ???
  375. 22E2- 00        BRK
  376. 22E3- 00        BRK
  377. 22E4- 00        BRK
  378. 22E5- 00        BRK
  379. 22E6- 04        ???
  380. 22E7- 00        BRK
  381. 22E8- 00        BRK
  382. 22E9- 08        PHP
  383. 22EA- 00        BRK
  384. 22EB- 00        BRK
  385. 22EC- 00        BRK
  386. 22ED- 00        BRK
  387. 22EE- 01 00     ORA ($00,X)
  388. 22F0- 04        ???
  389. 22F1- 00        BRK
  390. 22F2- 00        BRK
  391. 22F3- 00        BRK
  392. 22F4- 00        BRK
  393. 22F5- 00        BRK
  394. 22F6- 00        BRK
  395. 22F7- 0F        ???
  396. 22F8- 50 52     BVC $234C
  397. 22FA- 4F        ???
  398. 22FB- 44        ???
  399. 22FC- 4F        ???
  400. 22FD- 53        ???
  401. 22FE- 20 45 52  JSR $5245
  402. 2301- 52        ???
  403. 2302- 4F        ???
  404. 2303- 52        ???
  405. 2304- 3A        ???
  406. 2305- 20 24 06  JSR $0624
  407. 2308- 46 2E     LSR $2E
  408. 230A- 44        ???
  409. 230B- 49 43     EOR #$43
  410. 230D- 54        ???
  411. 230E- 06 46     ASL $46
  412. 2310- 2E 44 49  ROL $4944
  413. 2313- 53        ???
  414. 2314- 4B        ???
  415. 2315- 00        BRK
  416. 2316- 00        BRK
  417. 2317- 00        BRK
  418. 2318- 00        BRK
  419. 2319- 00        BRK
  420. 231A- 00        BRK
  421. 231B- 00        BRK
  422. 231C- 00        BRK
  423. 231D- 00        BRK
  424. 231E- 00        BRK
  425. 231F- 00        BRK
  426. 2320- 00        BRK
  427. 2321- 00        BRK
  428. 2322- 00        BRK
  429. 2323- 00        BRK
  430. 2324- 00        BRK
  431. 2325- 00        BRK
  432. 2326- 00        BRK
  433. 2327- 00        BRK
  434. 2328- 00        BRK
  435. 2329- 00        BRK
  436. 232A- 00        BRK
  437. 232B- 00        BRK
  438. 232C- 00        BRK
  439. 232D- 00        BRK
  440. 232E- 00        BRK
  441. 232F- 00        BRK
  442. 2330- 00        BRK
  443. 2331- 00        BRK
  444. 2332- 00        BRK
  445. 2333- 00        BRK
  446. 2334- 00        BRK
  447. 2335- 00        BRK
  448. 2336- 00        BRK
  449. 2337- 00        BRK
  450. 2338- 00        BRK
  451. 2339- 00        BRK
  452. 233A- 00        BRK
  453. 233B- 00        BRK
  454. 233C- 00        BRK
  455. 233D- 00        BRK
  456. 233E- 00        BRK
  457. 233F- 00        BRK
  458. 2340- 00        BRK
  459. 2341- 00        BRK
  460. 2342- 00        BRK
  461. 2343- 00        BRK
  462. 2344- 00        BRK
  463. 2345- 00        BRK
  464. 2346- 00        BRK
  465. 2347- 00        BRK
  466. 2348- 00        BRK
  467. 2349- 00        BRK
  468. 234A- 00        BRK
  469. 234B- 00        BRK
  470. 234C- 00        BRK
  471. 234D- 00        BRK
  472. 234E- 00        BRK
  473. 234F- 00        BRK
  474. 2350- 00        BRK
  475. 2351- 00        BRK
  476. 2352- 00        BRK
  477. 2353- 00        BRK
  478. 2354- 00        BRK
  479. 2355- 00        BRK
  480. 2356- 00        BRK
  481. 2357- 00        BRK
  482. 2358- 00        BRK
  483. 2359- 00        BRK
  484. 235A- 00        BRK
  485. 235B- 00        BRK
  486. 235C- 00        BRK
  487. 235D- 00        BRK
  488. 235E- 00        BRK
  489. 235F- 00        BRK
  490.